inherited FRelatorioPrevisaoRecebimento: TFRelatorioPrevisaoRecebimento
  Left = 166
  Top = 148
  Width = 986
  Height = 579
  Caption = 'Previs'#227'o de Recebimentos'
  OldCreateOrder = True
  Scaled = False
  PixelsPerInch = 96
  TextHeight = 16
  inherited Panel1: TPanel
    Width = 978
  end
  inherited Panel2: TPanel
    Width = 978
    Caption = 'Previs'#227'o de Recebimentos'
  end
  inherited GroupBox1: TGroupBox
    object Label10: TLabel
      Left = 10
      Top = 27
      Width = 59
      Height = 16
      Caption = 'Empresas'
    end
    object Label3: TLabel
      Left = 9
      Top = 98
      Width = 67
      Height = 16
      Caption = 'Cliente (F8)'
    end
    object CLBEmpresas: TCheckListBox
      Left = 9
      Top = 46
      Width = 368
      Height = 43
      Columns = 1
      ItemHeight = 16
      TabOrder = 0
    end
    object DBLCBCliente: TDBLookupComboBox
      Left = 9
      Top = 114
      Width = 359
      Height = 22
      Ctl3D = False
      KeyField = 'CLI_CODIGO'
      ListField = 'CLI_RAZAO'
      ListSource = DSCliente
      ParentCtl3D = False
      TabOrder = 1
      OnKeyDown = DBLCBClienteKeyDown
    end
    object GroupBox3: TGroupBox
      Left = 9
      Top = 149
      Width = 225
      Height = 65
      Caption = '  Periodo de Vencimento  '
      TabOrder = 2
      object Label8: TLabel
        Left = 106
        Top = 33
        Width = 7
        Height = 16
        Caption = #225
      end
      object DEDataVencimentoFim: TDateEdit
        Left = 121
        Top = 28
        Width = 88
        Height = 21
        Ctl3D = False
        NumGlyphs = 2
        ParentCtl3D = False
        TabOrder = 0
      end
      object DEDataVencimentoIni: TDateEdit
        Left = 10
        Top = 28
        Width = 88
        Height = 21
        Ctl3D = False
        NumGlyphs = 2
        ParentCtl3D = False
        TabOrder = 1
      end
    end
    object DBGrid1: TDBGrid
      Left = 4
      Top = 220
      Width = 561
      Height = 131
      DataSource = DataSource1
      Font.Charset = ANSI_CHARSET
      Font.Color = clWindowText
      Font.Height = -11
      Font.Name = 'Arial'
      Font.Style = []
      ParentFont = False
      TabOrder = 3
      TitleFont.Charset = ANSI_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -13
      TitleFont.Name = 'Arial'
      TitleFont.Style = []
    end
  end
  inherited RLReport: TRLReport
    Left = 80
    Top = 477
    Background.AutoSize = False
    DataSource = DataSource1
    object RLGroup1: TRLGroup
      Left = 38
      Top = 120
      Width = 718
      Height = 130
      Borders.Sides = sdCustom
      Borders.DrawLeft = False
      Borders.DrawTop = False
      Borders.DrawRight = False
      Borders.DrawBottom = True
      Borders.FixedBottom = True
      DataFields = 'CLIENTE'
      object RLBand2: TRLBand
        Left = 0
        Top = 0
        Width = 718
        Height = 39
        AutoSize = True
        BandType = btHeader
        BeforePrint = RLBand2BeforePrint
        object RLLabel1: TRLLabel
          Left = 0
          Top = 5
          Width = 53
          Height = 16
          Caption = 'Cliente:'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object RLDBText2: TRLDBText
          Left = 56
          Top = 5
          Width = 57
          Height = 16
          DataField = 'CLIENTE'
          DataSource = DataSource1
        end
        object RLLabel3: TRLLabel
          Left = 187
          Top = 23
          Width = 126
          Height = 16
          Alignment = taRightJustify
          Caption = 'VALOR '#192' RECEBER'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object RLLabel4: TRLLabel
          Left = 343
          Top = 23
          Width = 119
          Height = 16
          Alignment = taRightJustify
          Caption = 'VALOR RECEBIDO'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object RLLabel5: TRLLabel
          Left = 555
          Top = 23
          Width = 49
          Height = 16
          Alignment = taRightJustify
          Caption = 'SALDO'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
      end
      object RLBand6: TRLBand
        Left = 0
        Top = 58
        Width = 718
        Height = 27
        AutoExpand = False
        BandType = btSummary
        BeforePrint = RLBand6BeforePrint
        object RLLabel2: TRLLabel
          Left = 187
          Top = 5
          Width = 126
          Height = 16
          Alignment = taRightJustify
        end
        object RLLabel6: TRLLabel
          Left = 346
          Top = 5
          Width = 116
          Height = 16
          Alignment = taRightJustify
        end
        object RLLabel7: TRLLabel
          Left = 494
          Top = 5
          Width = 110
          Height = 16
          Alignment = taRightJustify
        end
        object RLDraw1: TRLDraw
          Left = 184
          Top = 2
          Width = 425
          Height = 5
          DrawKind = dkLine
        end
        object RLLabel8: TRLLabel
          Left = 99
          Top = 5
          Width = 82
          Height = 16
          Alignment = taRightJustify
          Caption = 'SUB. TOTAL'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
      end
      object RLBand4: TRLBand
        Left = 0
        Top = 39
        Width = 718
        Height = 19
        AutoExpand = False
        AutoSize = True
        BeforePrint = RLBand4BeforePrint
        object RLLabel10: TRLLabel
          Left = 70
          Top = 3
          Width = 65
          Height = 16
        end
        object RLLabel11: TRLLabel
          Left = 1
          Top = 3
          Width = 71
          Height = 16
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clBlack
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = [fsBold]
          ParentFont = False
        end
        object RLDBText3: TRLDBText
          Left = 265
          Top = 3
          Width = 48
          Height = 16
          Alignment = taRightJustify
          DataField = 'VALOR'
          DataSource = DataSource1
          DisplayMask = '0,.00'
          BeforePrint = RLDBText3BeforePrint
        end
        object RLDBText4: TRLDBText
          Left = 420
          Top = 3
          Width = 42
          Height = 16
          Alignment = taRightJustify
          DataField = 'PAGO'
          DataSource = DataSource1
          DisplayMask = '0,.00'
          BeforePrint = RLDBText4BeforePrint
        end
        object RLDBText5: TRLDBText
          Left = 504
          Top = 3
          Width = 100
          Height = 16
          Alignment = taRightJustify
          DataField = 'SALDO_PAGTO'
          DataSource = DataSource1
          DisplayMask = '0,.00'
          BeforePrint = RLDBText5BeforePrint
        end
      end
    end
    object RLBand7: TRLBand
      Left = 38
      Top = 250
      Width = 718
      Height = 42
      BandType = btSummary
      BeforePrint = RLBand7BeforePrint
      object RLLabel9: TRLLabel
        Left = 134
        Top = 5
        Width = 47
        Height = 16
        Alignment = taRightJustify
        Caption = 'TOTAL'
        Font.Charset = DEFAULT_CHARSET
        Font.Color = clBlack
        Font.Height = -13
        Font.Name = 'Arial'
        Font.Style = [fsBold]
        ParentFont = False
      end
      object RLLabel12: TRLLabel
        Left = 187
        Top = 5
        Width = 126
        Height = 16
        Alignment = taRightJustify
      end
      object RLLabel13: TRLLabel
        Left = 343
        Top = 5
        Width = 116
        Height = 16
        Alignment = taRightJustify
      end
      object RLLabel14: TRLLabel
        Left = 494
        Top = 5
        Width = 110
        Height = 16
        Alignment = taRightJustify
      end
    end
  end
  inherited QPesquisa: TQuery
    Active = True
    SQL.Strings = (
      ' SELECT'
      '  CLI_CODIGO,'
      '  CLI_RAZAO AS CLIENTE,'
      '  CR_DATAVENCIMENTO AS VENCIMENTO,'
      '  CR_VALOR AS VALOR,'
      '  SUM(LANC_VALOR) AS PAGO,'
      '  CONTASRECEBER.CR_SALDO AS SALDO_PAGTO,'
      '  CONTASRECEBER.CODIGOEMPRESA'
      ' FROM'
      '  CONTASRECEBER'
      
        '  LEFT JOIN LANCAMENTO  ON ((CONTASRECEBER.CR_CODIGO  = LANCAMEN' +
        'TO.LANC_TITULO) AND'
      
        '  (LANCAMENTO.EXCLUIDO <> '#39'S'#39' OR LANCAMENTO.EXCLUIDO IS NULL) AN' +
        'D'
      '  (CONTASRECEBER.CODIGOEMPRESA  = LANCAMENTO.CODIGOEMPRESA))'
      '  INNER JOIN CLIENTE ON  (CLI_CODIGO = CR_CLIENTE)'
      ' WHERE'
      
        '  (CONTASRECEBER.EXCLUIDO <> '#39'S'#39' OR CONTASRECEBER.EXCLUIDO IS NU' +
        'LL)'
      
        '    And (CR_Cliente = 1) And (CR_DATAVENCIMENTO  >= '#39'01/06/2011'#39 +
        ') And (CR_DATAVENCIMENTO  <= '#39'09/06/2011'#39')'
      ' GROUP BY'
      '  CR_DATAVENCIMENTO,'
      '  CLI_CODIGO,'
      '  CLI_RAZAO,'
      '  CR_VALOR,'
      '  CR_SALDO,'
      '  CONTASRECEBER.CODIGOEMPRESA'
      ' ORDER BY'
      '  CR_DATAVENCIMENTO,'
      '  CLI_CODIGO,'
      '  CLI_RAZAO,'
      '  CR_VALOR,'
      '  CR_SALDO,'
      '  CONTASRECEBER.CODIGOEMPRESA ')
    Left = 432
    Top = 73
  end
  inherited DSPesquisa: TDataSource
    Left = 512
    Top = 70
  end
  object DSCliente: TDataSource
    DataSet = DMGestao.QCliente
    Left = 512
    Top = 152
  end
  object CDSPesquisa: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 64
    Top = 264
  end
  object DataSource1: TDataSource
    DataSet = CDSPesquisa
    Left = 400
    Top = 142
  end
end
